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transition = 0 
cycles = 0 
cycles_temp = 0 
clock = 2e6 

for (n = 2 ; n <= data ; n++) 

if ((SSfnJ 1) (ssfn-1] l) ) 

cycles.temp = cycles^temc + 1 

cycles = cycles + l 

If (SLIN[n-l] != SLIN[n]) 

transition = transition + 1 

cycles^temp = i 
) else { 
} 

if (transition == O) 

cycles = 0 

cycles_temp = 0 
} else { 

} 

} else { 
} 

} 

cycles = cycles - cycles^temp 

If (cycles <= 0) 

{ 

cycles = 1 
} else { 
} 

frequency^estimate = (transition - 1, * clock / (cycles * 2) 
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for (n = 2 ; n <= data ; n++) 
{ 

if ((SS[nI == 1) && (SS[n-l] === 1)) 
{ 

if {{SLIN_QCn-l] i= SLIN_Q[nI) && SLIN.Q[ix] == 1) ) 
{ 

SLOPE [n] = SLIN_I(n] 

} 

} 

) 
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